home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 (Alt) / MACD 5.bin / workbench / boot / czesc_2 / saferpatches / source.lha / Source / FindPatch.a next >
Encoding:
Text File  |  1992-10-04  |  351 b   |  18 lines
  1. AbsExecBase    equ     4
  2.  
  3. _LVOSetFunction equ     -420     ; no need to include everything just for this one
  4.  
  5.         xdef        @FindPatches
  6.  
  7.         section     text,code
  8. @FindPatches:    moveq.l     #0,D0
  9.         move.l        (AbsExecBase).W,A0
  10.         move.l        _LVOSetFunction+2(A0),A0
  11.         cmp.w        #$49f9,$10(A0)
  12.         bne        1$
  13.         move.l        $12(A0),A0
  14.         move.l        $4(A0),D0
  15. 1$        rts
  16.  
  17.         end
  18.